home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / xcmd / fulsfpck.sit / FullSFPack 1.2 (US) / card_2903.txt < prev    next >
Text File  |  1991-09-02  |  5KB  |  194 lines
  1. -- card: 2903 from stack: in.2 (US)
  2. -- bmap block id: 3523
  3. -- flags: 0000
  4. -- background id: 2768
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   if the target contains "card button"
  9.   then
  10.   put FullSFPack(short name of the target) into cd fld 2
  11.   show cd fld 2
  12. end if
  13. end mouseUp
  14.  
  15.  
  16. -- part 1 (field)
  17. -- low flags: 01
  18. -- high flags: 0007
  19. -- rect: left=69 top=68 right=252 bottom=434
  20. -- title width / last selected line: 0
  21. -- icon id / first selected line: 0 / 0
  22. -- text alignment: 0
  23. -- font id: 3
  24. -- text size: 9
  25. -- style flags: 0
  26. -- line height: 12
  27. -- part name: Text
  28.  
  29.  
  30. -- part 4 (button)
  31. -- low flags: 00
  32. -- high flags: A004
  33. -- rect: left=97 top=287 right=306 bottom=168
  34. -- title width / last selected line: 0
  35. -- icon id / first selected line: 0 / 0
  36. -- text alignment: 1
  37. -- font id: 0
  38. -- text size: 12
  39. -- style flags: 0
  40. -- line height: 16
  41. -- part name: Get
  42.  
  43.  
  44. -- part 5 (button)
  45. -- low flags: 00
  46. -- high flags: A004
  47. -- rect: left=173 top=287 right=306 bottom=244
  48. -- title width / last selected line: 0
  49. -- icon id / first selected line: 0 / 0
  50. -- text alignment: 1
  51. -- font id: 0
  52. -- text size: 12
  53. -- style flags: 0
  54. -- line height: 16
  55. -- part name: Put
  56.  
  57.  
  58. -- part 6 (button)
  59. -- low flags: 00
  60. -- high flags: A004
  61. -- rect: left=249 top=287 right=306 bottom=320
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 0 / 0
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: Folder
  70.  
  71.  
  72. -- part 7 (button)
  73. -- low flags: 00
  74. -- high flags: A004
  75. -- rect: left=325 top=287 right=306 bottom=396
  76. -- title width / last selected line: 0
  77. -- icon id / first selected line: 0 / 0
  78. -- text alignment: 1
  79. -- font id: 0
  80. -- text size: 12
  81. -- style flags: 0
  82. -- line height: 16
  83. -- part name: Volume
  84.  
  85.  
  86. -- part 8 (button)
  87. -- low flags: 00
  88. -- high flags: A004
  89. -- rect: left=401 top=287 right=306 bottom=472
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 0 / 0
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: Multiple
  98.  
  99.  
  100. -- part 9 (field)
  101. -- low flags: 81
  102. -- high flags: 2004
  103. -- rect: left=79 top=111 right=213 bottom=432
  104. -- title width / last selected line: 0
  105. -- icon id / first selected line: 0 / 0
  106. -- text alignment: 0
  107. -- font id: 3
  108. -- text size: 9
  109. -- style flags: 0
  110. -- line height: 12
  111. -- part name: 
  112. ----- HyperTalk script -----
  113. on mouseUp
  114.   hide me
  115. end mouseUp
  116.  
  117.  
  118. -- part contents for card part 1
  119. ----- text -----
  120.  
  121.                                             FullSFPack 1.2
  122.                                           formerly FullFile
  123.  
  124.                                         by Fr├⌐d├⌐ric RINALDI
  125.  
  126.  
  127. DESCRIPTION
  128. ------------
  129.   FullSFPack allows to use standard dialogs for seleting a file, folder or volume. It allows even to deal with Alias files themselves rather than with pointed entries, and adds a multiple files selection dialog.
  130.  
  131.  
  132. SYNTAX
  133. -------
  134.    FullSFPack(<G[et]|P[ut]|V[olume]|F[older]|M[ultiple]>[,<type 1[ΓǪ,type 4]>]
  135.               [,<default dir>][,<new name>][,<prompt>][,"DontResolveAlias"])
  136.  
  137.  
  138. PARAMETRES
  139. ------------
  140.    <G[et]|P[ut]|V[olume]|F[older]|M[ultiple]> is the action param and defines the desired dialog.
  141.  
  142.    <type 1[ΓǪ,type 4]> is a 1 to 4 items list containing types of files to display in the dialog. Default presents all files.
  143.  
  144.    <default dir> is a full pathname string allowing to set the current directory when the dialog pops on screen.
  145.  
  146.    <new name> is a string only needed with "P[ut]", and gives the default name for the new file in the dialog's edit field.
  147.  
  148.    <prompt> is the message string appearing in the dialog.
  149.  
  150.    "dontResolveAlias" allows to deal with an alias file itself (System 7.0 only) rather than with the file pointed by it.
  151.  
  152.    Using "!", "?" or "=" as first parameter will return an online help (resp. 
  153.  
  154.  
  155. USING
  156. ------
  157.    FullSFPack requires System 7.0.
  158.  
  159.    The XFCN returns the full patname of the selected file, folder or volume.
  160.  
  161.    With "M[ultiple]", it returns a return delimited list of all collected files.
  162.  
  163.  
  164. ERRORS
  165. -------
  166.    If an error occurs, FullSFPack will return :
  167.      "Error : FullSFPack needs System 7.0"
  168.      "Error : Missing or empty parameter"
  169.      "Error : Bad action parameter"
  170.  
  171.  
  172. HISTORY
  173. -------
  174. 1.2                                                                                           09/02/91
  175. ΓÇó Fixed Select directory that didn't return answer
  176.  
  177. 1.1                                                                                           08/25/91
  178. ΓÇó Fixed bug preventing alias files to appear in italic with "M"
  179. ΓÇó Added Notification Mgr call
  180. ΓÇó Fixed Cancel bug with "F"
  181.  
  182. 1.0                                                                                           08/12/91
  183.  
  184. ---------------------------------------------------------------------
  185. This (these) external(s) is (are) FreeWare,allowing unlimited use in any non-commercial stack. You just need in this case to mention the author's name and copyright in your stack.
  186. Any commercial use must be licensed and aknowledged by the author.
  187.  
  188.                                      ┬⌐ Frederic RINALDI 1991
  189.  
  190. AppleLink: RINALDI1        CalvaCom : FR10        Compuserve : 71170,2111
  191.  
  192. -- part contents for card part 9
  193. ----- text -----
  194. 300 Mo:Applications:HyperCard:My Externals:US:Not Done: